home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Softwarová Záchrana 3
/
Softwarova-zachrana-3.bin
/
Xteq X-Setup
/
xqdcXSP-Setup-EN.exe
/
{app}
/
plugins
/
XQ MSOXP OTL Options 2.xpl
< prev
next >
Wrap
Text File
|
2001-12-30
|
2KB
|
54 lines
"FILE"="Xteq Systems X-Setup Plugin 5.0"
"TYPE"="6"
"COUNT"="1"
"UIPATH"="Program Options\Microsoft Office\MS Office XP\Outlook"
"NAME"="Minimize to Tray"
"VERSION"="1.14"
"LANGUAGE"="VBScript"
"TEXT 1"="Display Outlook minimized in the tray"
"DESCRIPTION 1"="Normally, when Outlook is minimized, it minimizes to the taskbar."
"DESCRIPTION 2"="If this option is activated, Outlook minimizes to the tray (the area where the clock is located, bottom-right)."
"DESCRIPTION 3"="For users that always use Outlook this can save some clutter in the taskbar."
"AUTHOR"="Xteq Systems"
"CONTACTURL"="http://www.xteq.com/"
"COPYRIGHT"="Copyright ⌐ Xteq Systems - All rights reserved."
"COMMENT 1"="Tweak detected by WinGUIDES - http://www.winguides.com/registry/display.php/955/"
'Declaration of some constants
sV1="HKCU\Software\Microsoft\Office\10.0\Outlook\Preferences\MinToTray" 'DW: 1
sPCheck="HKCU\Software\Microsoft\Office\10.0\Outlook\"
Sub Plugin_Initialize
if RegPathExists(sPCheck) then
i=RegReadValue(sV1)
if i=1 then SetUIElement 1,true
else
Disable()
end if
END SUB
'Called when the Plugin should validate the Data the user has entered
SUB Plugin_CheckData(ElementIndex)
END SUB
'Called when the Plugin should apply the changes
SUB Plugin_Apply(ElementIndex,ElementSubIndex)
b=GetUIElement(1)
if b=true then
Call RegWriteValue(sV1,"1",2)
else
if RegValueExists(sV1) then
Call RegDeleteValue(sV1)
end if
end if
END SUB
'Called when the Plugin is about to be removed from memory
SUB Plugin_Terminate
END SUB